﻿Imports SecretaryToolData

Public Class frmMonthlyReports

	Private ReadOnly Property TypedMonthlyReportBindingSource As MonthlyReport
		Get
			Return CType(MonthlyReportBindingSource.DataSource, MonthlyReport)
		End Get
	End Property

	Private Sub frmMonthlyReports_Load(sender As Object, e As System.EventArgs) Handles Me.Load
		MonthlyReportBindingSource.DataSource = New MonthlyReport
		AllMonthlyRecordsBindingSource.DataSource = TypedMonthlyReportBindingSource.AllMonthlyRecords
		MonthlyReportBindingSource.ResetBindings(False)
		AllMonthlyRecordsBindingSource.ResetBindings(False)

	End Sub

	Private Sub btnClose_Click(sender As System.Object, e As System.EventArgs) Handles btnClose.Click
		Me.Close()
	End Sub
End Class